home *** CD-ROM | disk | FTP | other *** search
/ Scene 96 / Scene 96 International Edition (Zyklop Software) (Disc 2) (1997).iso / misc / coding / gema26a / protect2.s < prev   
Text File  |  1995-10-28  |  2KB  |  82 lines
  1. * Hard Disk Protector v1.0 by Jedi/Sector 0ne
  2. * Protects Your C: Partition Against Format & Writting
  3. * E-Mail: Frank.Denis@epita.edu
  4.  
  5.         real
  6.  
  7.         org $100
  8.  
  9.         move #$201,a
  10.         push cs
  11.         pop es
  12.         move #$80,d             $80 = Master HDD, $81 = Slave HDD
  13.         move #1,c
  14.         move #buffer,b
  15.         trap #$13
  16.         push cs
  17.         pop ds
  18.         move #buffer+$1bf,si    $1bf = C:, $1cf = D:, ...
  19.         move.b (si),a
  20.         move.b a,heya+2
  21.         move 1(si),a
  22.         move a,heya3+2
  23.         move.b 4(si),a
  24.         move.b a,heya2+2
  25.         move 5(si),a
  26.         move a,heya4+2
  27.  
  28.         move #$3513,a
  29.         trap #$21
  30.         move es,youpla+3
  31.         move b,youpla+1
  32.         move #zippo,d
  33.         push cs
  34.         pop ds
  35.         move #$2513,a
  36.         trap #$21
  37.         move #credits,d
  38.         move.b #9,ah
  39.         trap #$21
  40.         move #@zefin,d
  41.         move #$3100,a
  42.         trap #$21
  43.  
  44. credits dc.b "Hard Disk Protector v1.0 by Jedi/Sector 0ne",13,10
  45.         dc.b '$'
  46.  
  47. zippo   cmp.b #5,ah
  48.         beq.s hey
  49.         cmp.b #3,ah
  50.         beq.s yoplou
  51.         cmp.b #$b,ah
  52.         beq.s yoplou
  53. youpla  braf 0
  54. yoplou  cmp.b #$80,d
  55.         bne.s youpla
  56. heya    cmp.b #0,dh
  57.         blt.s youpla
  58. heya2   cmp.b #0,dh
  59.         bgt.s youpla
  60. heya3   cmp #0.w,c
  61.         blt.s youpla
  62. heya4   cmp #0.w,c
  63.         bgt.s youpla
  64.  
  65. hey     pusha
  66.         xor.b a,a
  67.         move #$3c8,d
  68.         out.b a,d
  69.         inc d
  70.         out.b a,d
  71.         out.b a,d
  72.         move.b #16,a
  73.         out.b a,d
  74.         popa
  75.         move.b #1,ah
  76.         stc
  77.         rte
  78.  
  79.         segment
  80. zefin
  81. buffer  ds.l 128
  82.